(custom-declare-variable-list): Process already-declared

custom variables from this list.

diff --git a/lisp/custom.el b/lisp/custom.el
index 1d93305c22e7fbe950638929d4923868fdb4af07..b56c5af3aaf979d071634a9774cf9d0dae0905b7 100644 (file)
--- a/lisp/custom.el
+++ b/lisp/custom.el
@@ -394,6 +394,11 @@ the default value for the SYMBOL."
 
 ;;; The End.
 
+;; Process the defcustoms for variables loaded before this file.
+(while custom-declare-variable-list
+  (apply 'custom-declare-variable (car custom-declare-variable-list))
+  (setq custom-declare-variable-list (cdr custom-declare-variable-list)))
+
 (provide 'custom)
 
 ;; custom.el ends here